home *** CD-ROM | disk | FTP | other *** search
/ Aminet 30 / Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso / Aminet / util / sys / 2b_mv_os2.lha / MultiView / Install < prev    next >
Text File  |  1998-11-14  |  45KB  |  1,464 lines
  1. ;
  2. ; $VER: Install MultiView 4.5 (14.10.98)
  3. ;
  4. ; Installer script for MultiView.
  5. ;
  6.  
  7. (set #english-lang    1)
  8. (set #polish-lang     2)
  9. (set #german-lang     4)
  10. (set #norsk-lang      8)
  11. (set #russian-lang   16)
  12. (set #dansk-lang     32)
  13. (set #svenska-lang   64)
  14. (set #italiano-lang 128)
  15. (set #français-lang 256)
  16.  
  17.  
  18. ; Get current language (no need for lots of silly icons! ;). However, this
  19. ; won't properly work for all versions of the Installer. Some don't
  20. ; understand the language "default" in the tool types... :/
  21.  
  22. (if (= (exists "Env:Language") 1)
  23.   ; GetEnv reports "String too long" if the variable doesn't exist! :/
  24.   ; Dunno if this is fixed in V43... But we need to check anyway.
  25.   (set @language (getenv "language"))
  26. )
  27.  
  28.  
  29. ;**************************************************************************
  30. ;
  31. ; English strings
  32. ;
  33.  
  34. (set #default-lang #english-lang)
  35.  
  36. (set #builtin-lang      "(built in)")
  37. (set #bad-kick          "You must have AmigaOS Release 2.04 or higher to use MultiView.")
  38. (set #install-parts     "Please select the parts you wish to install")
  39.  
  40. (set #item-program      "MultiView")
  41. (set #item-library      "FileID.library")
  42. (set #item-guide        "MultiView.guide")
  43. (set #item-locale       "Translations")
  44. (set #item-prefs        "MultiViewPrefs")
  45. (set #item-prefsguide   "MultiViewPrefs.guide")
  46.  
  47. (set #parts-header-help
  48.   (cat
  49.     "    Here you select the different parts of MultiView that you would like to "
  50.     "install. After that, you select the details of the installation (such as "
  51.     "where the different files should be installed). You may choose to install "
  52.     "the following items:\n"
  53.   )
  54. )
  55.  
  56. (set #item-program-help
  57.   (cat
  58.     "    MultiView: This program is a relacement for C= MultiView and should be "
  59.     "installed in SYS:Utilities/ directory.\n"
  60.   )
  61. )
  62.  
  63. (set #item-library-help
  64.   (cat
  65.     "    FileID.library: This library contains filetype recognizing functions.\n"
  66.   )
  67. )
  68.  
  69. (set #item-guide-help
  70.   (cat
  71.     "    MultiView.guide: The manual, in AmigaGuide® format. It contains "
  72.     "some general information about MultiView.\n"
  73.   )
  74. )
  75.  
  76. (set #item-local-help
  77.   (cat
  78.     "    Translations: If you install a translation, then MultiView  "
  79.     "and FileID.library can operate in the language(s) you select.\n"
  80.   )
  81. )
  82.  
  83. (set #item-prefs-help
  84.   (cat
  85.     "    MultiViewPrefs: This program is a configuration program for my MultiView"
  86.     "and should be installed in SYS:Prefs/ directory.\n"
  87.   )
  88. )
  89.  
  90. (set #item-prefsguide-help
  91.   (cat
  92.     "    MultiViewPrefs.guide: The manual, in AmigaGuide® format. It contains "
  93.     "some general information about MultiView Preferences.\n"
  94.   )
  95. )
  96.  
  97. (set #parts-footer-help
  98.   (cat
  99.     "    For more information about these items, please see the manual.\n"
  100.   )
  101. )
  102.  
  103. ; Only for expert users
  104. (set #where-program "Where would you like to install Main program?")
  105. (set #where-program-help
  106.   (cat
  107.     "    MultiView: This program is a replacement for old Multiview written "
  108.     "by Commodore programmers. You should install it in SYS:Utilities.\n"
  109.   )
  110. )
  111. (set #where-library "Where would you like to install FileID.library?")
  112.  
  113. (set #where-library-help
  114.   (cat
  115.     "    FileID.library is a shared library. As such, MultiView"
  116.     "(and applications using it) expects this file to be "
  117.     "avilable via the \"Libs:\"-assign, so please install this "
  118.     "file into the \"Libs:\" drawer, or make sure that the "
  119.     "drawer you install it in will be a part of your "
  120.     "\"Libs:\"-assign.\n"
  121.   )
  122. )
  123.  
  124. (set #where-guide "Where would you like to install documentations?")
  125.  
  126. (set #where-guide-help
  127.   (cat
  128.     "    Documentations are files in the standard AmigaGuide® format. "
  129.     "As MultiView currently makes specific use of this file, you can install "
  130.     "it whereever you find convenient. If you have OS 3.0 or higher, "
  131.     "one such place is \"Help:\", as this is where other AmigaGuide® "
  132.     "files often are installed.\n"
  133.   )
  134. )
  135.  
  136. ; Only for expert users, and an icon wasn't found
  137. (set #copy-guide-icon "Do you want to install the icon for documentation?")
  138.  
  139. (set #copy-guide-icon-help
  140.   (cat
  141.     "    Since you stated that you are an expert user, and there currently "
  142.     "is no icon for documentation where you selected to install it, "
  143.     "you get a chance to decide if the icon should be installed as well.\n"
  144.   )
  145. )
  146.  
  147. (set #where-prefs "Where would you like to install prefs program?")
  148. (set #where-prefs-help
  149.   (cat
  150.     "    MultiViewPrefs: This program is a configuration program for my MultiView"
  151.     "and should be installed in SYS:Prefs/ directory.\n"
  152.   )
  153. )
  154.  
  155. (set #which-language "Which languages should be installed?")
  156.  
  157. (set #which-language-help
  158.   (cat
  159.     "    The Amiga can be operated in many different languages. If you "
  160.     "want MultiView to use the same language as your Amiga Workbench, "
  161.     "then a couple of catalog files must be copied to your harddisk "
  162.     "for each language supported.\n"
  163.     "    To reduce the amount of space consumed by the language files, "
  164.     "you can select to have only the files of specific languages "
  165.     "copied.\n"
  166.     "    Simply check the boxes of the languages you wish to have have "
  167.     "available on your system.\n"
  168.   )
  169. )
  170.  
  171. (set #copy "Copying %s to %s...")
  172.  
  173. ;**************************************************************************
  174. ;
  175. ; Polish strings
  176. ;
  177.  
  178. (if (= @language "polski")
  179.   (
  180.     (set #default-lang #polski-lang)
  181.  
  182.     (set #builtin-lang    "(wbudowany)")
  183.     (set #bad-kick        "Musisz mieê system w wersji przynajmniej 2.04.")
  184.     (set #install-parts   "Wybierz czëôci, które chcesz zainstalowaê")
  185.     (set #item-program    "MultiView")
  186.     (set #item-library    "FileID.library")
  187.     (set #item-guide      "MultiView.guide")
  188.     (set #item-prefs      "MultiViewPrefs")
  189.     (set #item-prefsguide "MultiViewPrefs.guide")
  190.     (set #item-locale     "Tîumaczenia")
  191.  
  192.     (set #parts-header-help
  193.       (cat
  194.         "    Tu moûesz wybraê poszczególne czëôci pakietu do zainstalowania. Potem "
  195.         "wybierzesz gdzie chcesz je zainstalowaê. Do wyboru masz :\n"
  196.       )
  197.     )
  198.  
  199.     (set #item-program-help
  200.       (cat
  201.         "    MultiView: Ten program jest zamiennikiem dla starego MultiView-a napisanego "
  202.         "jeszcze przez ludzi z Commodore. Powinieneô zainstalowaê go w katalogu SYS:Utilities.\n"
  203.       )
  204.     )
  205.  
  206.     (set #item-library-help
  207.       (cat
  208.         "    FileID.library: Ta biblioteka zawiera funkcje do rozpoznawania plików.\n"
  209.       )
  210.     )
  211.  
  212.     (set #item-guide-help
  213.       (cat
  214.         "    MultiView.guide: Dokumentacja w formacie AmigaGuide®.\n"
  215.       )
  216.     )
  217.  
  218.     (set #item-prefs-help
  219.       (cat
  220.         "    MultiViewPrefs: To jest program konfiguracyjny dla mojego MultiView-a "
  221.         "Powinieneô zainstalowaê go w katalogu SYS:Prefs/.\n"
  222.       )
  223.     )
  224.  
  225.     (set #item-prefsguide-help
  226.       (cat
  227.         "    MultiViewPrefs.guide: Dokumentacja w formacie AmigaGuide®.\n"
  228.       )
  229.     )
  230.  
  231.     (set #item-local-help
  232.       (cat
  233.         "    Tîumaczenia: Jeôli chcesz by MultiView i FileID.library mogîy "
  234.         "byê z polskimi komunikatami musisz zainstalowaê odpowiednie katalogi.\n\n"
  235.       )
  236.     )
  237.  
  238.     (set #parts-footer-help
  239.       (cat
  240.         "    Dodatkowe informacje znajdziesz w dokumentacji.\n\n"
  241.       )
  242.     )
  243.  
  244.     ; Only for expert users
  245.     (set #where-program "Gdzie chcesz zainstalowaê gîówny program?")
  246.     (set #where-program-help
  247.       (cat
  248.         "    MultiView: Ten program jest zamiennikiem dla starego MultiView-a napisanego "
  249.         "jeszcze przez ludzi z Commodore. Powinieneô zainstalowaê go w katalogu SYS:Utilities.\n"
  250.       )
  251.     )
  252.  
  253.     (set #where-library "Gdzie chcesz zainstalowaê FileID.library?")
  254.     (set #where-library-help
  255.       (cat
  256.         "    FileID.library jest zwykîâ bibliotekâ. MultiView "
  257.         "i inne programy spodziewajâ sië, ûe znajdâ jâ w Libs:, tak wiëc "
  258.         "musisz jâ zainstalowaê do katalogu bëdâcego czëôciâ twej kolekcji bibliotek.\n"
  259.       )
  260.     )
  261.  
  262.     (set #where-guide "Gdzie chcesz zainstalowaê dokumentacjë?")
  263.     (set #where-guide-help
  264.       (cat
  265.         "    Dokumentacja jest w plikach w standardzie AmigaGuide®. "
  266.         "Proponowanym miejscem jest HELP:\n"
  267.       )
  268.     )
  269.  
  270.     (set #where-prefs "Gdzie chcesz zainstalowaê program konfiguracyjny?")
  271.     (set #where-prefs-help
  272.       (cat
  273.         "    MultiViewPrefs: To jest program konfiguracyjny dla mojego MultiView-a "
  274.         "Powinieneô zainstalowaê go w katalogu SYS:Prefs/.\n"
  275.       )
  276.     )
  277.  
  278.     (set #copy-guide-icon "Czy chcesz zainstalowaê ikonë dla MultiView.guide?")
  279.     (set #which-language "Które jëzyki powinny byê zainstalowane ?")
  280.     (set #copy "Kopiujë %s do %s...")
  281.   )
  282. )
  283.  
  284. ;**************************************************************************
  285. ;
  286. ; Hello, do you speak German?
  287. ; Translation by Sönke Tesch [ATO]
  288.  
  289. (if (= @language "deutsch")
  290.   (
  291.     (set #default-lang #german-lang)
  292.     (set #builtin-lang "(eingebaut)")
  293.     (set #bad-kick "Du mußt AmigaOS 2.04 oder höher haben, um MultiView benutzen zu können!")
  294.     (set #install-parts "Bitte wähle die Teile, die du installieren möchtest.")
  295.     (set #item-program "MultiView")
  296.     (set #item-library "FileID.library")
  297.     (set #item-guide "MultiView.guide")
  298.     (set #item-locale "Übersetzungen")
  299.     (set #item-prefs        "MultiViewPrefs")
  300.     (set #item-prefsguide   "MultiViewPrefs.guide")
  301.  
  302.     (set #parts-header-help
  303.       (cat
  304.         "    Hier kannst du auswählen, welche Teile von MultiView installiert "
  305.         "werden sollen. Danach werden die Details festgelegt (z.B. wo genau "
  306.         "alles installiert werden soll).\n"
  307.         "Es können folgende Teile installiert werden:\n"
  308.       )
  309.     )
  310.  
  311.     (set #item-program-help
  312.       (cat
  313.         "    MultiView: Dies ist das Ersatzprogramm für C=`s MultiView. Es "
  314.         "sollte in das Verzeichniss SYS:Utilities/ kopiert werden.\n"
  315.       )
  316.     )
  317.  
  318.     (set #item-library-help
  319.       (cat
  320.         "    FileID.library: Mit Hilfe dieser Funktionsbibliothek werden "
  321.         "Dateitypen identifiziert.\n"
  322.       )
  323.     )
  324.  
  325.     (set #item-guide-help
  326.       (cat
  327.         "    MultiView.guide: Die Anleitung, im AmigaGuide® Format. Sie "
  328.         "enhält einige generelle Informationen über MultiView.\n"
  329.       )
  330.     )
  331.  
  332.     (set #item-local-help
  333.       (cat
  334.         "    Übersetzungen: Wenn eine oder mehrere Übersetzungen installiert "
  335.         "werden, können MultiView und die FileID.library in den entsprechenden "
  336.         "Sprachen arbeiten.\n"
  337.       )
  338.     )
  339.  
  340.  
  341.     (set #item-prefs-help
  342.       (cat
  343.         "    MultiViewPrefs: Dies ist das Einstellungsprogramm für mein MultiView"
  344.         "und sollte nach SYS:Prefs/ installiert werden.\n"
  345.       )
  346.     )
  347.  
  348.     (set #item-prefsguide-help
  349.       (cat
  350.         "    MultiViewPrefs.guide: Die Anleitung, im AmigaGuide® Format. Sie enthält "
  351.         "einige generelle Informationen über MultiView Preferences.\n"
  352.       )
  353.     )
  354.  
  355.     (set #parts-footer-help
  356.       (cat
  357.         "    Für weitere Infos schaue bitte in die Anleitung.\n"
  358.       )
  359.     )
  360.  
  361. ; Only for expert users
  362.     (set #where-program "Wo soll das Hauptprogramm installiert werden?")
  363.     (set #where-program-help
  364.       (cat
  365.         "    MultiView: Dies ist ein Ersatz des alten Multiview von Commodore."
  366.         "Es sollte in SYS:Utilities installiert werden.\n"
  367.       )
  368.     )
  369.  
  370.     (set #where-library "Wo soll die FileID.library installiert werden?")
  371.  
  372.     (set #where-library-help
  373.       (cat
  374.         "    FileID.library ist eine Shared Library. Der vorgesehene Platz "
  375.         "für solche Libraries ist ein Verzeichnis, auf das das LIBS:-Assign "
  376.         "zeigt.\n"
  377.         "Bitte installiere diese Datei also direkt in LIBS: oder, falls du ein "
  378.         "anderes wählst, stelle sicher, daß es über das LIBS:-Assign erreichbar "
  379.         "ist.\n"
  380.       )
  381.     )
  382.  
  383.     (set #where-guide "Wo soll die Anleitung installiert werden?")
  384.  
  385.     (set #where-guide-help
  386.       (cat
  387.         "    Die Anleitung MultiView.guide ist eine Datei im AmigaGuide® Format, "
  388.         "von der MultiView intensiven Gebrauch macht.\n"
  389.         "Wenn du AmigaOS 3.0 oder besseres hast, lege die Datei am besten in "
  390.         "\"Help:\", da das der Platz ist, an den AmigaGuide®-Dateien normalerweise "
  391.         "kopiert werden."
  392.       )
  393.     )
  394.  
  395. ; Only for expert users, and an icon wasn't found
  396.     (set #copy-guide-icon "Soll ein Icon für die Anleitung installiert werden?")
  397.  
  398.     (set #copy-guide-icon-help
  399.       (cat
  400.         "    Da du Experte bist, und an dem Platz, wo die Anleitung installiert "
  401.         "werden soll, kein Icon für sie ist, bekommst du jetzt die Chance zu "
  402.         "entscheiden, ob auch ein Icon installiert werden soll.\n"
  403.       )
  404.     )
  405.  
  406.     (set #where-prefs "Wo soll das Einstellungsprogramm installiert werden?")
  407.     (set #where-prefs-help
  408.       (cat
  409.         "    MultiViewPrefs: Dies ist das Einstellungsprogramm für mein MultiView "
  410.         "und sollte in SYS:Prefs/ installiert werden.\n"
  411.       )
  412.     )
  413.  
  414.     (set #which-language "Welche Sprachen sollen installiert werden?")
  415.  
  416.     (set #which-language-help
  417.       (cat
  418.         "    Der Amiga kann von Haus aus in vielen Sprachen mit dir `sprechen`. "
  419.         "Wenn MultiView dieselbe Sprachen benutzen soll, wie deine Workbench, "
  420.         "müssen einige Kataloge auf die Festplatte kopiert werden\n".
  421.         "Um etwas Platz zu sparen, kannst du hier auswählen, welche Sprachen "
  422.         "(und damit welche Kataloge), kopiert werden sollen, indem du einfach "
  423.         "die entsprechenden Kästchen abhakst\n".
  424.       )
  425.     )
  426.  
  427.     (set #copy "Kopiere %s nach %s...")
  428.   )
  429. )
  430.  
  431. ;**************************************************************************
  432. ;
  433. ; Norwegian strings
  434. ;
  435.  
  436. (if (= @language "norsk")
  437.   (
  438.     (set #default-lang #norsk-lang)
  439.     (set #builtin-lang "(innebygget)")
  440.     (set #bad-kick "Du må ha AmigaOS 2.04 eller høyere for å bruke MultiView.")
  441.     (set #install-parts "Vennligst velg de delene du vil installere")
  442.     (set #item-program "MultiView")
  443.     (set #item-library "FileID.library")
  444.     (set #item-guide "MultiView.guide")
  445.     (set #item-locale "Oversettelser")
  446.     (set #parts-header-help
  447.       (cat
  448.         "    Her velger du de delene av MultiView programmet du vil installere."
  449.         "Etter det så velger du detaljene for installasjonen (som f.eks. hvor "
  450.         "de forskjellige filene skal installeres). Du kan velge å installere de"
  451.         "de følgende gjenstandende:\n"
  452.       )
  453.     )
  454.     (set #item-program-help
  455.       (cat
  456.         "    MultiView: Dette er en erstatning for C= MultiView og bør "
  457.         "installeres i katalogen 'SYS:Utilities/'.\n"
  458.       )
  459.     )
  460.  
  461.     (set #item-library-help
  462.       (cat
  463.         "    FileID.library: Dette biblioteket kjenner igjen forskellige "
  464.         "filtyper.\n"
  465.       )
  466.     )
  467.  
  468.     (set #item-guide-help
  469.       (cat
  470.         "    MultiView.guide: Instruksjons-boken, i AmigaGuide® format. Den "
  471.         "inneholder generell informasjon om MultiView.\n"
  472.       )
  473.     )
  474.  
  475.     (set #item-local-help
  476.       (cat
  477.         "    Translations: Hvis du innstallerer en oversettelse så kan MultiView  "
  478.         "og FileID.library kjøres på det språket du har valgt.\n"
  479.       )
  480.     )
  481.  
  482.     (set #parts-footer-help
  483.       (cat
  484.         "    For mer informasjon om disse tingene, se i instruksjons-filen.\n"
  485.       )
  486.     )
  487.  
  488. ; Only for expert users
  489.     (set #where-program "Hvor vil du installere MultiView?")
  490.     (set #where-program-help
  491.       (cat
  492.         "    MultiView: dette er hovedprogrammet og er en forbedring av Commodore MultiView. "
  493.         "Det bør installeres i 'SYS:Utilities/' mappen.\n"
  494.       )
  495.     )
  496.  
  497.     (set #where-library "Hvor vil du installere FileID.library?")
  498.     (set #where-library-help
  499.       (cat
  500.         "    FileID.library er et delt bibliotek som brukes av MultiView (og andre programmer)."
  501.         "Programmene forventer at det ligger i 'Libs:' så vær sikker på at du installerer "
  502.         "det der, eller at stedet hvor du installerer det er en del av 'Libs:' anvisningen.\n"
  503.       )
  504.     )
  505.  
  506.     (set #where-guide "Hvor vil du installere MultiView.guide?")
  507.     (set #where-guide-help
  508.       (cat
  509.         "    MultiView.guide er instruksjonene i standard AmigaGuide® format "
  510.         "som kan installeres hvor du vil. Hvis du har OS 3.0 eller høyere, kan "
  511.         "du installere den i 'HELP:' der slike filer ofte er.\n"
  512.       )
  513.     )
  514.  
  515.     (set #copy-guide-icon "Vil du installere et ikon til MultiView.guide?")
  516.     (set #copy-guide-icon-help
  517.       (cat
  518.         "    Siden du er en ekspert-bruker og det ikke er noe ikon "
  519.         "til MultiView.guide der du har valgt å installere den, "
  520.         "får du nå anledning til å installere et ikon hvis du vil.\n"
  521.       )
  522.     )
  523.  
  524.     (set #which-language "Hvilke språk skal installeres ?")
  525.     (set #which-language-help
  526.       (cat
  527.         "    Amiga kan kjøre programmer på mange forskjellige språk, "
  528.         "MultiView kan også kjøres i det språket du bruker Workbench i.\n"
  529.         "Det du må gjøre er å velge et språk fra listen over støttede "
  530.         "språk.\n"
  531.         "    For å redusere plassen disse filene opptar kan du velge "
  532.         "å kun installere noen av disse språkfilene.\n"
  533.         "    Marker ganske enkelt boksene foran de språkene du vil "
  534.         "ha tilgjengelig på ditt system.\n"
  535.       )
  536.     )
  537.  
  538.     (set #copy "Kopierer %s til %s...")
  539.   )
  540. )
  541. ;**************************************************************************
  542. ;
  543. ; Russian strings
  544. ;
  545. ; NOTE: If it will be need to use in script the name for russian language
  546. ;       then use everywhere only "Russian" or "russian" and no else.
  547. ;       (There isn't native writing for one!)
  548. ;
  549.  
  550. (if (= @language "russian")
  551.   (
  552.     (set #default-lang #russian-lang)
  553.     (set #builtin-lang "(áðñïíäììúè)")
  554.     (set #bad-kick "Ãêþ çðîíêûæíáaìçþ MultiView ìäíàôíãçëí çëäñû áäïðçý AëçâaÍР2.04 çêç áúøä.")
  555.     (set #install-parts "Òéaåçñä íàÿäéñú çìðñaêêþõçç")
  556.     (set #item-program "MultiView")
  557.     (set #item-library "FileID.library")
  558.     (set #item-guide "MultiView.guide")
  559.     (set #item-locale "Îäïäáíãú")
  560.  
  561.     (set #parts-header-help
  562.       (cat
  563.         "    Òéaåçñä öaðñç îaéäña MultiView, éíñíïúä Áú ôíñçñä îïíçìðñaêêçïíáañû. Îíðêä "
  564.         "üñíâí ò Áað àòãòñ òñíöìäìú ãäñaêç çìðñaêêþõçç (ìaîïçëäï, ëaïøïòñú ïaæëäùäìçþ "
  565.         "ïaæêçöìúô óaèêíá îaéäña). Áú ëíåäñä áúàïañû ðêäãòýùçä öaðñç îaéäña:\n"
  566.       )
  567.     )
  568.  
  569.     (set #item-program-help
  570.       (cat
  571.         "    MultiView: Üña îïíâïaëëa þáêþäñðþ æaëäìíè íïçâçìaêûìíè C= MultiView, éíñíïaþ, "
  572.         "éaé îïaáçêí, ïaæëäùäìa á éañaêíâä SYS:Utilities/\n"
  573.       )
  574.     )
  575.  
  576.     (set #item-library-help
  577.       (cat
  578.         "    FileID.library: Üña àçàêçíñäéa ðíãäïåçñ óòìéõçç ïaðîíæìaáaìçþ óaèêñçîíá.\n"
  579.       )
  580.     )
  581.  
  582.     (set #item-guide-help
  583.       (cat
  584.         "    MultiView.guide: Íîçðaìçä, á óíïëañä AmigaGuide®. Ðíãäïåçñ íðìíáìòý "
  585.         "çìóíïëaõçý í MultiView.\n"
  586.       )
  587.     )
  588.  
  589.     (set #item-local-help
  590.       (cat
  591.         "    Îäïäáíãú: Îïç çìðñaêêþõçç îäïäáíãíá îïíâïaëëa MultiView ç FileID.library "
  592.         "ðëíâòñ íîäïçïíáañû òéaæaììúëç þæúéaëç.\n"
  593.       )
  594.     )
  595.  
  596.     (set #parts-footer-help
  597.       (cat
  598.         "    Æa ãíîíêìçñäêûìíè çìóíïëaõçäè íàïaùaèñäðû é íîçðaìçý.\n"
  599.       )
  600.     )
  601.  
  602.     ; Only for expert users
  603.     (set #where-program "Éòãa çìðñaêêçïíáañû îïíâïaëëò?")
  604.     (set #where-program-help
  605.       (cat
  606.         "    MultiView - îïíâïaëëa, îïçæáaììaþ æaëäìçñû íãìíçë½ììòý îïíâïaëëò óçïëú "
  607.         "Commodore. Ïäéíëäìãòäñðþ ïaæëäðñçñû á éañaêíâä SYS:Utilities.\n"
  608.       )
  609.     )
  610.  
  611.     (set #where-library "Éòãa çìðñaêêçïíáañû FileID.library?")
  612.  
  613.     (set #where-library-help
  614.       (cat
  615.         "    FileID.library þáêþäñðþ ïaæãäêþäëíè àçàêçíñäéíè. MultiView, éaé ç ãïòâçä îïíâïaëëú, "
  616.         "ä½ çðîíêûæòýùçä, éaé îïaáçêí, íåçãaäñ ìaêçöçþ üñíè àçàêçíñäéç á ìaæìaöäììíë éañaêíâä "
  617.         "\"Libs:\", îíüñíëò çìðñaêêçïòèñä üñíñ óaèê á éañaêíâ \"Libs:\", çêç òàäãçñäðû, öñí éañaêíâ, "
  618.         "á éíñíïíë Áú ïaæëäðñçñä àçàêçíñäéò, þáêþäñðþ aððçâìíáaììúë é òéaæaììíëò éañaêíâò.\n"
  619.       )
  620.     )
  621.  
  622.     (set #where-guide "Éòãa çìðñaêêçïíáañû MultiView.guide?")
  623.  
  624.     (set #where-guide-help
  625.       (cat
  626.         "    MultiView.guide - ðñaìãaïñìúè óaèê óíïëaña AmigaGuide®. MultiView çðîíêûæòäñ "
  627.         "üñíñ óaèê á íîïäãäê½ììúô ðêòöaþô, îíüñíëò ïaæëäðñçñä üñíñ óaèê îí òãíàðñáò. Äðêç "
  628.         "Áú çëääñä ÍР3.0 çêç áúøä, ñí üñí éañaêíâ\"Help:\", á éíñíïíë, éaé îïaáçêí "
  629.         "ïaðîíêíåäìú ç ãïòâçä óaèêú óíïëaña AmigaGuide®.\n"
  630.       )
  631.     )
  632.  
  633.     ; Only for expert users, and an icon wasn't found
  634.     (set #copy-guide-icon "Çìðñaêêçïíáañû çéíìéò é MultiView.guide?")
  635.  
  636.     (set #copy-guide-icon-help
  637.       (cat
  638.         "    Áú òðñaìíáçêç òïíáäìû çìðñaêêþõçç \"Üéðîäïñ\" ç ëíåäñä îïíçìðñaêêçïíáañû çéíìéò "
  639.         "ãêþ óaèêa MultiView.guide, éíñíïaþ á íàúöìíè ðçñòaõçç ìä çìðñaêêçïòäñðþ.\n"
  640.       )
  641.     )
  642.  
  643.     (set #which-language "Éaéçä þæúéç íàùäìçþ îïíçìðñaêêçïíáañû?")
  644.  
  645.     (set #which-language-help
  646.       (cat
  647.         "    Aëçâa ëíåäñ íîäïçïíáañû ëìíåäðñáíë ïaæêçöìúô þæúéíá. Äðêç Áú ôíñçñä, öñíàú "
  648.         "MultiView çðîíêûæíáaê ñä åä þæúéç, öñí ç Áaø Workbench, ñí ðííñáäñðñáòýùçä éañaêíâç "
  649.         "ãêþ éaåãíâí þæúéa íàùäìçþ ãíêåìú àúñû îíëäùäìú ìa å½ðñéçè ãçðé.\n"
  650.         "    Ãêþ üéíìíëçç ãçðéíáíâí îïíðñaìðñáa, æaìçëaäëíâí þæúéíáúëç óaèêaëç, Áú ëíåäñä "
  651.         "òéaæañû ñíêûéí ïäaêûìí ìäíàôíãçëúä ãêþ éíîçïíáaìçþ óaèêú.\n"
  652.         "    Îïíðñí îïíðñaáûñä âaêíöéç ò ñäô þæúéíá, éíñíïúä ìäíàôíãçëú Áaë ãêþ íàùäìçþ á "
  653.         "Áaøäè ðçðñäëä.\n"
  654.       )
  655.     )
  656.  
  657.     (set #copy "Éíîçïòý %s á %s...")
  658.   )
  659. )
  660. ;**************************************************************************
  661. ;
  662. ; Danish strings
  663. ;
  664.  
  665. (if (= @language "dansk")
  666.   (
  667.     (set #default-lang #dansk-lang)
  668.     (set #builtin-lang "(indbygget)")
  669.     (set #bad-kick "Du skal have AmigaOS 2.04 eller nyere for at bruge MultiView.")
  670.     (set #install-parts "Vælg venligst de dele du ønsker installeret")
  671.     (set #item-program "MultiView")
  672.     (set #item-library "FileID.library")
  673.     (set #item-guide "MultiView.guide")
  674.     (set #item-locale "Oversættelser")
  675.  
  676.     (set #parts-header-help
  677.       (cat
  678.         "Her vælger du de forskellige dele af MultiView som du ønsker at "
  679.         "installere. Derefter vælger du detaljerne i installeringen (såsom "
  680.         "hvor de forskellige filer skal installeres). Du kan vælge at "
  681.         "installere følgende dele:\n"
  682.       )
  683.     )
  684.  
  685.     (set #item-program-help
  686.       (cat
  687.         "MultiView: Dette program er en erstatning for C='s MultiView, "
  688.         "og bør installeres i kataloget SYS:Utilities/\n"
  689.       )
  690.     )
  691.  
  692.     (set #item-library-help
  693.       (cat
  694.         "FileID.library: Dette bibliotek indeholder "
  695.         "filtype-genkendelsesfunktioner.\n"
  696.       )
  697.     )
  698.  
  699.     (set #item-guide-help
  700.       (cat
  701.         "MultiView.guide: Brugervejledning, i AmigaGuide®-format. "
  702.         "Den indeholder generel information om MultiView.\n"
  703.       )
  704.     )
  705.  
  706.     (set #item-local-help
  707.       (cat
  708.         "Oversættelser: Hvis du installerer en oversættelse, vil "
  709.         "MultiView og FileID.library kunn køre med de(t) sprog du vælger.\n"
  710.       )
  711.     )
  712.  
  713.     (set #parts-footer-help
  714.       (cat
  715.         "For mere information om disse punkter, se venligst brugervejledningen.\n"
  716.       )
  717.     )
  718.  
  719. ; Only for expert users
  720.     (set #where-library "Hvor ønsker du at installere FileID.library?")
  721.  
  722.     (set #where-library-help
  723.       (cat
  724.         "FileID.library er et funktionsbibliotek. Som sådan forventer "
  725.         "MultiView (og programmerne som bruger det) at denne fil ligger "
  726.         "i \"Libs:\"-stien, så installér denne fil i \"Libs:\"-kataloget "
  727.         "eller vær sikker på at det katalog du installerer det i, er en "
  728.         "del af \"Libs:\"-tildelingen.\n"
  729.       )
  730.     )
  731.  
  732.     (set #where-guide "Hvor ønsker du at installere MultiView.guide?")
  733.  
  734.     (set #where-guide-help
  735.       (cat
  736.         "MultiView.guide er en fil i det normale AmigaGuide®-format. "
  737.         "Da MultiView gør specifik brug af denne fil, kan du installere "
  738.         "den hvor du ønsker. Hvis du har OS3.0 eller nyere, er et sådant "
  739.         "sted \"Help:\", da dette er hvor andre AmigaGuide®-filer ofte "
  740.         "ligger.\n"
  741.       )
  742.     )
  743.  
  744. ; Only for expert users, and an icon wasn't found
  745.     (set #copy-guide-icon "Ønsker du at installere ikonet til MultiView.guide?")
  746.  
  747.     (set #copy-guide-icon-help
  748.       (cat
  749.         "Siden du angav at du var en ekspertbruger, og der lige nu ikke "
  750.         "findes et ikon til MultiView.guide hvor du valgte at installere "
  751.         "det, har du nu chancen for at angive om ikonet også skal "
  752.         "installeres.\n"
  753.       )
  754.     )
  755.  
  756.     (set #which-language "Hvilke sprog ønsker du at installere?")
  757.  
  758.     (set #which-language-help
  759.       (cat
  760.         "Amigaen kan køre i mange forskellige sprog. Hvis du ønsker at "
  761.         "MultiView skal bruge det samme sprog som din Workbench, så skal "
  762.         "en sprogfil kopieres til din harddisk for hvert understøttet "
  763.         "sprog.\n"
  764.         "  For at reducere pladsen som optages af sprogfilerne, kan du "
  765.         "vælge kun at kopiere bestemte sprogfiler.\n"
  766.         "  Du skal bare sætte et hak i boksene til de sprog du ønsker "
  767.         "tilgængelige på dit system.\n"
  768.       )
  769.     )
  770.  
  771.     (set #copy "Kopierer %s til %s...")
  772.   )
  773. )
  774. ;**************************************************************************
  775. ;
  776. ; Swedish strings
  777. ;
  778.  
  779. (if (= @language "svenska")
  780.   (
  781.     (set #default-lang #svenska-lang)
  782.     (set #builtin-lang "(inbyggt)")
  783.     (set #bad-kick "Du måste ha AmigaOS version 2.04 eller högre för att använda MultiView.")
  784.     (set #install-parts "Välj de delar du önskar installera")
  785.     (set #item-program "MultiView")
  786.     (set #item-library "FileID.library")
  787.     (set #item-guide "MultiView.guide")
  788.     (set #item-locale "Översättningar")
  789.  
  790.     (set #parts-header-help
  791.       (cat
  792.         "    Här väljer du de delar av MultiView som du vill installera. Sedan ställer "
  793.         "du in installationsdetaljerna (t ex var de olika filerna skall installeras). "
  794.         "Du kan välja att installera följande delar av programmet:\n"
  795.       )
  796.     )
  797.  
  798.     (set #item-program-help
  799.       (cat
  800.         "    MultiView: Detta program är en ersättning för Commodores MultiView och "
  801.         "bör installeras i lådan SYS:Utilities/.\n"
  802.       )
  803.     )
  804.  
  805.     (set #item-library-help
  806.       (cat
  807.         "    FileID.library: Detta bibliotek innehåller funktioner för igenkänning av "
  808.         "olika filtyper.\n"
  809.       )
  810.     )
  811.  
  812.     (set #item-guide-help
  813.       (cat
  814.         "    MultiView.guide: Manualen i AmigaGuide®-format. Den innehåller "
  815.         "en del generell information om MultiView.\n"
  816.       )
  817.     )
  818.  
  819.     (set #item-local-help
  820.       (cat
  821.         "    Översättningar: Om du installerar en översättning kan MultiView "
  822.         "och FileID.library sedan använda de(t) språk du valt.\n"
  823.       )
  824.     )
  825.  
  826.     (set #parts-footer-help
  827.       (cat
  828.         "    För mer information om dessa delar av programmet, konsultera manualen.\n"
  829.       )
  830.     )
  831.  
  832. ; Only for expert users
  833.     (set #where-library "Var vill du installera FileID.library?")
  834.  
  835.     (set #where-library-help
  836.       (cat
  837.         "    FileID.library är ett s k \"delat bibliotek\". Som sådant "
  838.         "förväntar sig MultiView (och program som använder det) att "
  839.         "detta bibliotek skall vara tillgängligt via \"Libs:\"-tilldelningen; "
  840.         "du bör därför se till att det installeras i \"Libs:\"-lådan "
  841.         "eller att lådan du installerar det i är en del av din "
  842.         "\"Libs:\"-tilldelning.\n"
  843.       )
  844.     )
  845.  
  846.     (set #where-guide "Var vill du installera MultiView.guide?")
  847.  
  848.     (set #where-guide-help
  849.       (cat
  850.         "    MultiView.guide är en fil som följer det standardiserade AmigaGuide®-formatet. "
  851.         "Eftersom MultiView för närvarande utnyttjar denna specifika fil, kan du "
  852.         "installera den någonstans där det passar dig. Om du har OS 3.0 eller högre, "
  853.         "är \"Help:\" lämpligt eftersom det är där andra AmigaGuide®-filer ofta "
  854.         "installeras.\n"
  855.       )
  856.     )
  857.  
  858. ; Only for expert users, and an icon wasn't found
  859.     (set #copy-guide-icon "Vill du installera ikonen för MultiView.guide?")
  860.  
  861.     (set #copy-guide-icon-help
  862.       (cat
  863.         "    Eftersom du angett att du är en expertanvändare och eftersom det för tillfället "
  864.         "inte finns någon ikon för MultiView.guide där du valt att installera filen, "
  865.         "får du en chans att välja om ikonen också skall installeras.\n"
  866.       )
  867.     )
  868.  
  869.     (set #which-language "Vilka språk skall installeras?")
  870.  
  871.     (set #which-language-help
  872.       (cat
  873.         "    Amigan kan användas med flera olika språk.  Om du vill att MultiView "
  874.         "skall använda samma språk som din Amiga Workbench behöver några "
  875.         "katalogfiler kopieras till din hårddisk för varje språk som stöds.\n"
  876.         "    För att spara på utrymmet som språkfilerna tar upp kan du "
  877.         "välja att endast vissa språkfiler kopieras.\n"
  878.         "    Bocka helt enkelt för de språk du vill kunna använda på ditt system.\n"
  879.       )
  880.     )
  881.  
  882.     (set #copy "Kopierar %s till %s...")
  883.   )
  884. )
  885. ;**************************************************************************
  886. ;
  887. ; Italian strings
  888. ;
  889.  
  890. (if (= @language "italiano")
  891.   (
  892.     (set #default-lang #italiano-lang)
  893.     (set #builtin-lang "(built-in)")
  894.     (set #bad-kick "Devi avere la versione 2.04 o superiore di AmigaOS per usare MultiView.")
  895.     (set #install-parts "Per favore scegli le parti che desideri installare")
  896.     (set #item-program "MultiView")
  897.     (set #item-library "FileID.library")
  898.     (set #item-guide "MultiView.guide")
  899.     (set #item-locale "Traduzioni")
  900.  
  901.     (set #parts-header-help
  902.       (cat
  903.         "   Qui scegli le differenti sezioni di MultiView che gradiresti fossero installate. "
  904.         "Dopo di ciò, seleziona il tipo di installazione (come ad esempio "
  905.         "dove dovrebbero essere installati i vari file). Puoi scegliere di installare "
  906.         "le seguenti voci:\n"
  907.       )
  908.     )
  909.  
  910.     (set #item-program-help
  911.       (cat
  912.         "   MultiView: Questo programma è un sostituto del C= MultiView e dovrebbe essere "
  913.         "installato nel cassetto SYS:Utilities/.\n"
  914.       )
  915.     )
  916.  
  917.     (set #item-library-help
  918.       (cat
  919.         "   FileID.library: Questa libreria possiede la funzione di riconoscimento del tipo file.\n"
  920.       )
  921.     )
  922.  
  923.     (set #item-guide-help
  924.       (cat
  925.         "   MultiView.guide: Il manuale, in formato AmigaGuide®. Contiene "
  926.         "delle informazioni generali su MultiView.\n"
  927.       )
  928.     )
  929.  
  930.     (set #item-local-help
  931.       (cat
  932.         "   Traduzioni: Se installi una traduzione, allora MultiView  "
  933.         "e la FileID.library possono funzionare nelle lingue da te selezionate.\n"
  934.       )
  935.     )
  936.  
  937.     (set #parts-footer-help
  938.       (cat
  939.         "   Per ulteriori informazioni su queste voci, per favore fai riferimento al manuale.\n"
  940.       )
  941.     )
  942.  
  943.     ; Only for expert users
  944.     (set #where-library "Dove vuoi installare la FileID.library?")
  945.  
  946.     (set #where-library-help
  947.       (cat
  948.         "   FileID.library è una libreria condivisa. Così come, MultiView "
  949.         "(e le applicazioni che la usano) questo file attende che sia "
  950.         "disponibile attraverso la \"Libs:\"-assign, così per favore installa questo "
  951.         "file nel cassetto \"Libs:\", o assicurati che il cassetto "
  952.         "dove lo installi sia parte del tuo \"Libs:\"-assign.\n"
  953.       )
  954.     )
  955.  
  956.     (set #where-guide "Dove vuoi installare la MultiView.guide?")
  957.  
  958.     (set #where-guide-help
  959.       (cat
  960.         "   MultiView.guide è un file nel formato standard AmigaGuide®. "
  961.         "Dato che MultiView correntemente fa un uso specifico di questo file, puoi installarlo "
  962.         "dove lo trovi più comodo. Se hai l'OS 3.0 o superiore, "
  963.         "il luogo può essere \"Help:\", dato che questo ed altri file AmigaGuide® "
  964.         "sono spesso lì installati.\n"
  965.       )
  966.     )
  967.  
  968.     ; Only for expert users, and an icon wasn't found
  969.     (set #copy-guide-icon "Vuoi installare l'icona per la MultiView.guide?")
  970.  
  971.     (set #copy-guide-icon-help
  972.       (cat
  973.         "   Dato che hai detto che sei un utente esperto, ed al momento non "
  974.         "vi è nessuna icona per la MultiView.guide da selezionare per installarla, "
  975.         "puoi avere la possibilità di decidere il tipo di icona che dovrebbe "
  976.         "essere installata.\n"
  977.       )
  978.     )
  979.  
  980.     (set #which-language "Quali lingue vuoi siano installate?")
  981.  
  982.     (set #which-language-help
  983.       (cat
  984.         "   L'Amiga può essere utilizzato con diverse lingue. Se vuoi che "
  985.         "MultiView usi la stessa lingua del tuo Workbench, allora alcuni "
  986.         "cataloghi devono essere copiati nel tuo harddisk  per ogni lingua "
  987.         "supportata.\n"
  988.         "   Per diminuire l'ammontare dello spazio occupato dai "
  989.         "cataloghi, puoi scegliere di avere solamente i file di una determinata "
  990.         "lingua.\n"
  991.         "   Cioè contrassegna solo per la lingua che desideri avere "
  992.         "disponibile nel tuo sistema.\n"
  993.       )
  994.     )
  995.  
  996.     (set #copy "Sto copiando %s in %s...")
  997.   )
  998. )
  999.  
  1000. ;**************************************************************************
  1001. ; Salut,t'es vraiment sure de savoir parler français?!
  1002. ; Traduit par CMwa
  1003. ;
  1004.  
  1005. (if (= @language "français")
  1006.   (
  1007.     (set #default-lang #français-lang)
  1008.     (set #builtin-lang "(interne)")
  1009.     (set #bad-kick "Vous devez avoir au moins la version 2.04 d'AmigaOS pour utiliser MultiView.")
  1010.     (set #install-parts "Veuillez sélectionner les parties à installer")
  1011.     (set #item-program "MultiView")
  1012.     (set #item-library "FileID.library")
  1013.     (set #item-guide "MultiView.guide")
  1014.     (set #item-locale "Traduction")
  1015.  
  1016.     (set #parts-header-help
  1017.       (cat
  1018.         "   Ici,vous sélectionnez les différentes parties de MultiView que vous désirez installer. "
  1019.         "Après ça, vous sélectionnez le type d'installation (par exemple, "
  1020.         "où les différends fichiers doivent être installés). vous pouvez choisir d'installer "
  1021.         "les fichiers suivants:\n"
  1022.       )
  1023.     )
  1024.  
  1025.     (set #item-program-help
  1026.       (cat
  1027.         "   MultiView: Ce programme remplace le MultiView C=. Il doit être "
  1028.         "installé dans le tiroir SYS:Utilities/.\n"
  1029.       )
  1030.     )
  1031.  
  1032.     (set #item-library-help
  1033.       (cat
  1034.         "   FileID.library: Cette librairie contient la fonction de reconnaissance du type de fichier.\n"
  1035.       )
  1036.     )
  1037.  
  1038.     (set #item-guide-help
  1039.       (cat
  1040.         "   MultiView.guide: Le manuel, au format AmigaGuide®. Il contient "
  1041.         "des information générales sur MultiView.\n"
  1042.       )
  1043.     )
  1044.  
  1045.     (set #item-local-help
  1046.       (cat
  1047.         "   Traduction: Si la traduction est installée, alors MultiView  "
  1048.         "et la FileID.library fonctionneront avec le langage sélectinnée.\n"
  1049.       )
  1050.     )
  1051.  
  1052.     (set #parts-footer-help
  1053.       (cat
  1054.         "   Pour plus d'information sur ces items, veuillez vous référer au manuel.\n"
  1055.       )
  1056.     )
  1057.  
  1058.     ; Only for expert users
  1059. ; Only for expert users
  1060. (set #where-program "Où voulez-vous installer le programme principal?")
  1061. (set #where-program-help
  1062.   (cat
  1063.     "    MultiView: Ce programme  remplace le vieux Multiview écrit "
  1064.     "par les programmeurs de Commodore. Vous devez l'installer dans SYS:Utilities.\n"
  1065.   )
  1066. )
  1067.  
  1068.     (set #where-library "Où voulez-vous installer la FileID.library?")
  1069.  
  1070.     (set #where-library-help
  1071.       (cat
  1072.         "   FileID.library est une librairie partagée. Ainsi, MultiView "
  1073.         "(et les applications qui l'utilise) cherche ce fichier vers "
  1074.         " \"Libs:\"-assign, veuillez donc installer ce "
  1075.         "fichier dans \"Libs:\", ou assurez-vous que le tiroir "
  1076.         "où vous l'instalez fait partie de votre \"Libs:\"-assign.\n"
  1077.       )
  1078.     )
  1079.  
  1080.     (set #where-guide "Où voulez-vous installer MultiView.guide?")
  1081.  
  1082.     (set #where-guide-help
  1083.       (cat
  1084.         "   MultiView.guide est un fichier au format standard AmigaGuide®. "
  1085.         "Actuellement, MultiView fait un usage spécifique de ce fichier, vous pouvez l'installer "
  1086.         "où vous le trouvez le plus commode. Si vous avez au moins l'OS 3.0, "
  1087.         "le tiroir \"Help:\" est le plus logique puisque les autres fichiers AmigaGuide® "
  1088.         "y sont installés.\n"
  1089.       )
  1090.     )
  1091.  
  1092.     ; Only for expert users, and an icon wasn't found
  1093.     (set #copy-guide-icon "Voulez-vous installer l'icône pour MultiView.guide?")
  1094.  
  1095.     (set #copy-guide-icon-help
  1096.       (cat
  1097.         "   Dato che hai detto che sei un utente esperto, ed al momento non "
  1098.         "vi è nessuna icona per la MultiView.guide da selezionare per installarla, "
  1099.         "puoi avere la possibilità di decidere il tipo di icona che dovrebbe "
  1100.         "essere installata.\n"
  1101.       )
  1102.     )
  1103.  
  1104.     (set #which-language "Quels langue voulez-vous installer?")
  1105.  
  1106.     (set #which-language-help
  1107.       (cat
  1108.         "   L'Amiga peut être utilisé avec divers langage. Si vous voulez que "
  1109.         "MultiView utilise la même langue que votre Workbench, alors un "
  1110.         "catalogue doit être copié sur votre disque dur  pour que votre langue "
  1111.         "soit supportée.\n"
  1112.         "   Pour diminuer la quantité d'espace occupé par "
  1113.         "le catalogue, vous pouvez n'avoir que le fichier concernant "
  1114.         "votre langue.\n"
  1115.         "   Sélectionnez simplement la langue "
  1116.         "utilisé sur votre système.\n"
  1117.       )
  1118.     )
  1119.  
  1120.     (set #copy "Copie de %s vers %s...")
  1121.   )
  1122. )
  1123.  
  1124.  
  1125. ;**************************************************************************
  1126. ; The actual installation script
  1127. ;**************************************************************************
  1128.  
  1129. ;**************************************************************************
  1130. ; First some initializations
  1131. ;**************************************************************************
  1132.  
  1133.  
  1134. ; Check Kickstart version. Exit if not at least 2.04
  1135. (if (< (/ (getversion) 65536) 37)
  1136.         (abort #bad-kick)
  1137. )
  1138.  
  1139. ; Since files are scatter installed, don't mention any specific location.
  1140. (set @default-dest "")
  1141.  
  1142. ; Request proportinal fonts, if supported. This string is
  1143. ; prepended to the first askoptions choice.
  1144. (if (>= @installer-version 2752518)     ; 42 * 65536 + 6
  1145.   ; At least version 42.6
  1146.   (set #propfont "p")
  1147.   ; Pre V42
  1148.   (set #propfont "")
  1149. )
  1150.  
  1151. (set #item-num-prog        1)
  1152. (set #item-num-lib         2)
  1153. (set #item-num-prefs       4)
  1154. (set #item-num-guide       8)
  1155. (set #item-num-locale     16)
  1156.  
  1157. ; Find out default values for parts to install
  1158. (set #install-default (BITOR #item-num-prog #item-num-lib #item-num-guide #item-num-prefs))
  1159.  
  1160. ; Locale installed?
  1161. (if (AND (= 2 (exists "Locale:" (noreq))) (< 0 (getversion "locale.library" (resident))))
  1162.   (set #install-default (BITOR #install-default #item-num-locale))
  1163. )
  1164.  
  1165. ; Everything ready
  1166.  
  1167. (welcome)
  1168.  
  1169. ; Ask the user what to install
  1170. (set #install-files
  1171.   (askoptions
  1172.     (prompt #install-parts)
  1173.     (help #parts-header-help
  1174.       #item-program-help
  1175.       #item-library-help
  1176.       #item-prefs-help
  1177.       #item-guide-help
  1178.       #item-local-help
  1179.       #parts-footer-help "\n"
  1180.       @askoptions-help)
  1181.     (choices
  1182.       (cat #propfont
  1183.       #item-program)
  1184.       #item-library
  1185.       #item-prefs
  1186.       #item-guide
  1187.       #item-locale
  1188.     )
  1189.     (default #install-default)
  1190.   )
  1191. )
  1192.  
  1193. ;**************************************************************************
  1194. ; Ask the user for the location of all parts
  1195. ;**************************************************************************
  1196.  
  1197. (set #program-dest  "SYS:Utilities")
  1198.  
  1199. ; Location for MultiView program (for experts)
  1200.  
  1201. (if (AND (= @user-level 2) (BITAND #install-files #item-num-prog))
  1202.   (set #program-dest
  1203.     (askdir
  1204.       (prompt  #where-program)
  1205.       (help    #where-program-help "\n" @askdir-help)
  1206.       (default #program-dest)
  1207.     )
  1208.   )
  1209. )
  1210.  
  1211. (set #library-dest  "Libs:")
  1212.  
  1213. ; Location for FileID.library (for experts)
  1214.  
  1215. (if (AND (= @user-level 2) (BITAND #install-files #item-num-lib))
  1216.   (set #library-dest
  1217.     (askdir
  1218.       (prompt  #where-library)
  1219.       (help    #where-library-help "\n" @askdir-help)
  1220.       (default #library-dest)
  1221.     )
  1222.   )
  1223. )
  1224.  
  1225. (set #prefs-dest  "SYS:Prefs")
  1226.  
  1227. ; Location for MultiView prefs (for experts)
  1228.  
  1229. (if (AND (= @user-level 2) (BITAND #install-files #item-num-prefs))
  1230.   (set #prefs-dest
  1231.     (askdir
  1232.       (prompt  #where-prefs)
  1233.       (help    #where-prefs-help "\n" @askdir-help)
  1234.       (default #prefs-dest)
  1235.     )
  1236.   )
  1237. )
  1238.  
  1239. ; Location for documentation
  1240.  
  1241. (if (BITAND #install-files #item-num-guide)
  1242.   (
  1243.     (set #guide-dest "Work:")
  1244.  
  1245.     (if (exists "Help:")
  1246.       (set #guide-dest "Help:")
  1247.     )
  1248.  
  1249.     (set #guide-dest
  1250.       (askdir
  1251.         (prompt  #where-guide)
  1252.         (help    #where-guide-help "\n" @askdir-help)
  1253.         (default #guide-dest)
  1254.       )
  1255.     )
  1256.  
  1257.     (set #dest-guide-name (tackon #guide-dest "Multiview.guide.info"))
  1258.  
  1259.     (set #guide-icon
  1260.       (if (AND (= @user-level 2 ) (= (exists #dest-guide-name) 0))
  1261.         (askbool
  1262.           (prompt #copy-guide-icon)
  1263.           (help #copy-guide-icon-help " ")
  1264.         )
  1265.         0 ; Default is to not copy the icon
  1266.       )
  1267.     )
  1268.   )
  1269. )
  1270.  
  1271. ; .ct
  1272. ; Which languages should be installed?
  1273.  
  1274. (if (BITAND #install-files #item-num-locale)
  1275.   (set #lang
  1276.     (askoptions
  1277.       (prompt #which-language)
  1278.       (help #which-language-help "\n" @askoptions-help)
  1279.       (choices
  1280.         (cat #propfont          "English  " #builtin-lang)
  1281.                                 "Polski"
  1282.                                 "Deutsch"
  1283.                                 "Norsk"
  1284.                                 "Russian"
  1285.                                 "Dansk"
  1286.                                 "Svenska"
  1287.                                 "Italiano"
  1288.                                 "Français"
  1289.                                 "Czech"
  1290.                                 "Croatian"
  1291.                                 "Portugese-brazil"
  1292.                                 ""
  1293.       )
  1294.         (default 0)
  1295.     )
  1296.   )
  1297. )
  1298.  
  1299. ; **********************************************************************
  1300. ; Everything set up. Now do the actual installation
  1301. ; **********************************************************************
  1302.  
  1303. (complete 0)
  1304.  
  1305. (if (BITAND #install-files #item-num-prog)
  1306.   (
  1307.     (copyfiles
  1308.       (prompt (#copy "MultiView" #program-dest))
  1309.       (source "MultiView")
  1310.       (dest #program-dest)
  1311.     )
  1312.     (copyfiles
  1313.       (prompt (#copy "MultiView" #program-dest))
  1314.       (source "MultiView.info")
  1315.       (dest #program-dest)
  1316.     )
  1317.   )
  1318. )
  1319.  
  1320. (complete 20)
  1321.  
  1322. (if (BITAND #install-files #item-num-lib)
  1323.   (
  1324.     (copylib
  1325.       (confirm average)
  1326.       (help "\n")
  1327.       (prompt (#copy "FileID.library" #library-dest))
  1328.       (source "libs/FileID.library")
  1329.       (dest #library-dest)
  1330.     )
  1331.   )
  1332. )
  1333.  
  1334. (complete 40)
  1335.  
  1336. (if (BITAND #install-files #item-num-prefs)
  1337.   (
  1338.     (copyfiles
  1339.       (prompt (#copy "MultiViewPrefs" #prefs-dest))
  1340.       (source "Prefs/")
  1341.       (all)
  1342.       (optional nofail)
  1343.       (dest #prefs-dest)
  1344.     )
  1345. ;    (copyfiles
  1346. ;      (prompt (#copy "MultiView.info" #prefs-dest))
  1347. ;      (source "Prefs/MultiView.info")
  1348. ;      (dest #prefs-dest)
  1349. ;    )
  1350.   )
  1351. )
  1352.  
  1353. (complete 60)
  1354.  
  1355. ;this part dont work because Workbench say"this icon haven't tool".where is the matter??
  1356.  
  1357. (if (BITAND #install-files #item-num-guide)
  1358.   (
  1359.     (set #guide-source
  1360.         (tackon (tackon "Docs/" @language) "MultiView.guide")
  1361.     )
  1362.     (copyfiles
  1363.       (prompt (#copy "MultiView.guide" #guide-dest))
  1364.       (source #guide-source)
  1365.       (dest   #guide-dest)
  1366.     )
  1367.     (set #guide-source
  1368.        (tackon (tackon "Docs/" @language) "MultiViewPrefs.guide")
  1369.     )
  1370.       (copyfiles
  1371.       (prompt (#copy "MultiViewPrefs.guide" #guide-dest))
  1372.       (source #guide-source)
  1373.       (dest   #guide-dest)
  1374.     )
  1375.  
  1376.     (if #guide-icon
  1377.       (
  1378.         (copyfiles
  1379.           (prompt (#copy "MultiView.guide.info" #guide-dest))
  1380.           (source (tackon (tackon "Docs/" @language) "MultiView.guide.info"))
  1381.           (dest   #guide-dest)
  1382.         )
  1383.         (copyfiles
  1384.           (prompt (#copy "MultiViewPrefs.guide.info" #guide-dest))
  1385.           (source (tackon (tackon "Docs/" @language) "MultiViewPrefs.guide.info"))
  1386.           (dest   #guide-dest)
  1387.         )
  1388.       )
  1389.     )
  1390.   )
  1391. )
  1392.  
  1393. (complete 80)
  1394.  
  1395. ; .ct
  1396. (if (BITAND #install-files #item-num-locale)
  1397.   (
  1398.     (set #n 0)
  1399.  
  1400.     (while
  1401.       (set #language
  1402.         (select #n
  1403.           "Deutsch"
  1404.           "English"
  1405.           "Polski"
  1406.           "Norsk"
  1407.           "Russian"
  1408.           "Dansk"
  1409.           "Svenska"
  1410.           "Italiano"
  1411.           "Czech"
  1412.           "Croatian"
  1413.           "Portugese-brazil"
  1414.           "Français"
  1415.           ""
  1416.         )
  1417.       )
  1418.  
  1419.       (
  1420.         (if (AND (IN #lang #n) (<> #language "English"))
  1421.           (
  1422.             (set #catalog
  1423.               (tackon "Catalogs"
  1424.                 (tackon #language "MultiView.catalog")
  1425.               )
  1426.             )
  1427.  
  1428.             (set #destination (tackon "Locale:Catalogs/" #language))
  1429.  
  1430.             (if (exists #catalog)
  1431.               (copylib
  1432.                 (prompt (#copy #catalog #destination))
  1433.                 (source #catalog)
  1434.                 (dest   #destination)
  1435.               )
  1436.             )
  1437.  
  1438.             (set #catalog
  1439.               (tackon "Catalogs"
  1440.                 (tackon #language "FileID_lib.catalog")
  1441.               )
  1442.             )
  1443.  
  1444.             (if (exists #catalog)
  1445.               (copylib
  1446.                 (prompt (#copy #catalog #destination))
  1447.                 (source #catalog)
  1448.                 (dest   #destination)
  1449.               )
  1450.             )
  1451.  
  1452.           )
  1453.         )
  1454.  
  1455.         (set #n (+ #n 1))
  1456.       )
  1457.     )
  1458.   )
  1459. )
  1460.  
  1461. (complete 100)
  1462.  
  1463. (exit)
  1464.